<% Option Explicit %>

<!--#include file="includes/cb_adovbs_sys.inc"-->
<!--#include file="includes/generally_sys.asp"-->
<!--#include file="includes/translate.asp"-->
<!--#include file="includes/gwm_user_menu_dhx.asp"-->

<%
'Codepage einstellen
Session.CodePage = 65001'Unicode, 8-bit encoding
Response.CharSet = "utf-8"

'Sprache -----------------------------------------------------------------
Dim i_lng
i_lng = Request("lng")
If IsEmpty(i_lng) or IsNull(i_lng) Then
	i_lng = Session("ses_i_language") 
end if
Session("ses_i_language")=i_lng'0=keine auswahl 1=german 2=english
'--------------------------------------------------------------------------
'Oeffnen der Datenbankverbindung
Dim objConn
Set objConn = Server.CreateObject("ADODB.Connection")
'Verbindung herstellen
objConn.open strComplete_sys

'Hints Icon---------------------------------------------------------------
Dim var_hints_08
var_hints_08 = fc_value_string(Session("ses_i_language"), "var_hints_08")

Dim var_autho_09
var_autho_09 = fc_value_string(Session("ses_i_language"), "var_autho_09")

Dim var_autho_10
var_autho_10 = fc_value_string(Session("ses_i_language"), "var_autho_10")

Dim var_autho_11
var_autho_11 = fc_value_string(Session("ses_i_language"), "var_autho_11")
'--------------------------------------------------------------------------


Dim isx
isx = Session("ses_i_isx")
If IsNull(isx) or IsEmpty(isx) Then
	isx = 0
end if
'call showMessage(isx)
'isx = 0 >> keine neue stammdateneingabe übers login
'isx = 2 >> neue head org stammdateneingabe übers login
'isx = 3 >> neue org stammdateneingabe übers login
'isx = 4 >> neue trainer stammdateneingabe übers login
'isx = 5 >> neue athlete stammdateneingabe übers login	
If Session("ses_dev")=1 Then'0 >> normalbetrieb - 1 > Applikation im entwicklungsstatus - nur für testbetrieb - es werden wichtige var ausgegeben
'Response.Write("ses_i_isx: " & isx & "<br>")
end if
'----------------------------------------------------------------------
Dim iu
Dim ig
iu = Session("ses_iu")
ig = Session("ses_ig")
'Response.Write("iu: " & iu & "<br>")
'Pruefen, ob der User eingeloggt ist
If Session("ses_iu") = 0 and Session("ses_ig") = 0 Then
   'User ist nicht eingeloggt, daher zu Login Seite schicken
   Response.Redirect "session_end.asp"
   Response.End
End If
'----------------------------------------------------------------------
Dim str_title
str_title = Session("ses_title")

%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml"><!-- InstanceBegin template="/Templates/vorlage_std_all.dwt" codeOutsideHTMLIsLocked="false" -->
<!-- ----------------------------------------------------------- -->
<!--       Beratung, Projektierung, Webdesign und Umsetzung      -->
<!--                     www.on-designs.com                      -->
<!-- Christian Freidl, Gärtnerweg 6, 8073 Neuseiersberg, Austria -->
<!-- ----------------------------------------------------------- -->
<!-- ----------------------------------------------------------- -->
<!--        Beratung, Projektierung, ASP-Programmierung          -->
<!--                     www.bribase.com                         -->
<!--                    Peter Brislinger,                        -->
<!--        Paul-Anton-Keller-Gasse 23, 8073 Feldkirchen         -->
<!-- ----------------------------------------------------------- -->
<head>
<% CALL writeGwmCustomHeaders %>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<!-- InstanceBeginEditable name="doctitle" -->
<title><%= str_title %> - Authorizations</title>
<!-- InstanceEndEditable -->
<LINK REL="SHORTCUT ICON" HREF="http://www.growmetry.com/favicon.ico">
<meta name="author" content="Programming by Peter Brislinger, http://www.bribase.com | Web & Interfacedesign by Christian Freidl, http://www.on-designs.com">
<meta name="robots" content="noindex, nofollow">
<meta name="audience" content="all">
<style type="text/css">
<!--
A:link, A:visited, A:active {text-decoration: none; color:#333333}
A:hover {text-decoration: underline}
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
	SCROLLBAR-FACE-COLOR: #ffffff; 
	SCROLLBAR-HIGHLIGHT-COLOR: #ffffff;
	SCROLLBAR-SHADOW-COLOR: #cccccc;
	SCROLLBAR-3DLIGHT-COLOR: #cccccc;
	SCROLLBAR-ARROW-COLOR: #666666;
	SCROLLBAR-TRACK-COLOR: #ffffff;
	SCROLLBAR-DARKSHADOW-COLOR: #ffffff
}
-->
</style>
<link href="../css/growmetry.css" rel="stylesheet" type="text/css" />

<!-- InstanceBeginEditable name="head" -->
<%
	'include scripts for the menu
	CALL userMenuAddScripts
%>
<!-- InstanceEndEditable -->
</head>

<body>
<script type="text/javascript" src="includes/wz_tooltip.js"></script>

<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" class="backout">
<table width="950" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="479" valign="top" background="../App/images/standard/filler_vert.gif"><table width="950" border="0" cellpadding="0" cellspacing="0" class="<%= fc_value_string(Session("ses_i_language"), "var_glob_bitm_20") %>">
<tr>
<td width="25" height="90">&nbsp;</td>
<td width="900" height="90">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="bottom"><div align="right" class="txtsm">
</div>
<div align="right">
<div align="right" class="txtsm"></div>
</div>

<div align="right"><span class="txtloginasgrey"><%=Session("ses_txt_logininfo_z01")%></span><span class="txtloginasred"><strong><%=Session("ses_str_User_name")%></strong></span>
<span class="txtloginasgrey"> <%= fc_value_string(Session("ses_i_language"), "var_glob_txt_1009") %> <a href="index.asp"><%= fc_value_string(Session("ses_i_language"), "var_glob_txt_02") %></a></span><br/>
<strong class="txtloginasgreen"><%=Session("ses_txt_logininfo_z02")%> </strong><br/>
<span class="txtloginasgrey"><%=Session("ses_txt_logininfo_z03")%></span><br/>
</div>
</td>
</tr>
</table>
</td>
<td width="25" height="90">&nbsp;</td>
</tr>
<tr>
<td width="25">&nbsp;</td><!-- InstanceBeginEditable name="Edit_navi" -->


%>
<td width="900" align="left" class="navi">
	<table border="0" cellpadding="0" cellspacing="0" width="900">
		<td>
			<%
				'include menu object
				CALL userMenuWriteMenuObj("userMenu")
				CALL userMenuWriteInitScript("userMenu", objConn, getGroupByUser(objConn, Session("ses_iu")), Session("ses_i_language"))
			%>    		
		</td>
		<td align="right">
			<div style="padding-right: 5px; ">
			<% CALL userMenuInsertPagePath(objConn, getGroupByUser(objConn, Session("ses_iu")), Session("ses_i_language"), "athlete_authorizations.asp") %>
		    </div>
		</td>
	</table>  
</td>
        <!-- InstanceEndEditable -->
<td width="25">&nbsp;</td>
</tr>
<tr>
<td width="25">&nbsp;</td><!-- InstanceBeginEditable name="Edit_Content" -->
<td width="900" height="450" align="left" valign="top" class="contentadminDE"><table width="900" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="90" colspan="2">&nbsp;</td>
<td width="675" height="90">&nbsp;</td>
<td width="16" height="90">&nbsp;</td>
</tr>
<tr>
<td width="170" height="360" align="left" valign="top"><p class="txtbasesm"><br />
<br />
</p>
  <p class="txtsm"><strong><%= fc_value_string(Session("ses_i_language"), "var_autho_03") %></strong><br />
    <br />
    <%= fc_value_string(Session("ses_i_language"), "var_autho_04") %>
    </p>
  <br />
  </p>
  <p class="txtbasesm"><br />
    <br />
        <br />
  </p>

  <p class="txtbasesm">&nbsp; </p></td>
<td width="39" align="left" valign="top">&nbsp;</td>
<td width="675" height="360" align="left" valign="top"><table width="675" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="200">&nbsp;</td>
<td width="475" valign="top">

</td>
</tr>
</table>
<table width="675" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>&nbsp;</td>
<td width="650" valign="top">&nbsp;</td>
</tr>
</table>
<table width="675" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>&nbsp;</td>
<td width="650" valign="top">
</td>
</tr>
</table>
<%
If i_delete > 0 Then
'-------------------------------------------------------------------------------------------------------------
'wenn eine Zuordnung entfernt wurd muus zum aktualisieren der daten diese seite nochmals aufgerufen werden
Response.Redirect "athlete_authorizations.asp"
'-------------------------------------------------------------------------------------------------------------
end if

%>

</td>
<td width="16"><p>&nbsp;</p>
</td>
</tr>
</table>
</td>

        <!-- InstanceEndEditable -->
<td width="25" valign="top">&nbsp;</td>
</tr>
</table></td>
</tr>
<tr>
<td width="950" height="71" valign="bottom" background="<%= fc_value_string(Session("ses_i_language"), "var_glob_bitm_21") %>" class="txtlegal"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="230">&nbsp;</td>
<td height="24" align="left" valign="top" class="txtsm11">
<table width="100%" border="0">
<tr>
<td width="84%" height="35" valign="top"><span class="txtlegal"><a href="contact_us.asp"><%= fc_value_string(Session("ses_i_language"), "var_glob_txt_07") %></a> | <a href="about.asp"><%= fc_value_string(Session("ses_i_language"), "var_glob_txt_08") %></a> | <a href="terms.asp"><%= fc_value_string(Session("ses_i_language"), "var_glob_txt_09") %></a> | <a href="terms.asp#disclaimer"><%= fc_value_string(Session("ses_i_language"), "var_glob_txt_10") %></a> | <a href="terms.asp#privacy"><%= fc_value_string(Session("ses_i_language"), "var_glob_txt_11") %></a> | </span>
<% If Session("ses_i_language") = 2 Then %>
<input name="btnSublanguage" type="image" onClick="javascript: change_language(1)" value="lang01" src="../App/images/country/flag_germany.png" align="middle" width="16" height="16" vspace="1" border="0"/>
<% end if %>
<% If Session("ses_i_language") = 1 Then %>
<input name="btnSublanguage" type="image" onclick="javascript: change_language(2)" value="lang02" src="../App/images/country/flag_usa.png" align="middle" width="16" height="16" vspace="1" border="0"/>
<% end if %>     
</td>
<td width="5%" height="35" valign="top">&nbsp;</td>
<td width="5%" height="35" valign="top">&nbsp;</td>
<td width="6%" height="35" valign="top">&nbsp;</td>
</tr>
</table>
</td>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
</table>
</body>
<!-- InstanceEnd --></html>
<%

%>